<?php
#############################################################################
## Autor: Edgar Palma V. (DCM)
## Fecha de liberacion:
## Ultima Modificacion: 01/07/2005
## Ultimo Modificador: Ing. Perla De La Rosa(dcm)
## Descripcion: Este script forma el query para exportar el segmento.
#############################################################################
   include("../db.php");

  $q = "select st_Segmento, tx_Query from tbl_SegmentosCRM where id_Segmento = {$_GET['id']}";
  $result = mssql_query ($q);
  $row = mssql_fetch_object($result);
  
  $Segmento = html_entity_decode(urldecode($row->st_Segmento));
  
  if (mssql_num_rows($result) > 0)
  {
    $result = mssql_query ($q);
    $row = mssql_fetch_object($result);


    $q = "select ";
    $q .= "  tbl_UsuariosWeb.id_UsuarioWeb,";
    $q .= "  tbl_UsuariosWeb.st_Tarjeta as Tarjeta, ";
    $q .= "  tbl_UsuariosWeb.st_Email as Email,";
    $q .= "  tbl_UsuariosWeb.st_Nombre as Nombre,";
    $q .= "  tbl_UsuariosWeb.st_ApellidoPaterno as Apellido_Paterno,";
    $q .= "  tbl_UsuariosWeb.st_ApellidoMaterno as Apellido_Materno,";
    $q .= "  tbl_UsuariosWeb.dt_FechaNacimiento as Fecha_Nacimiento,";
    $q .= "  vivecon as Estado_Civil,";
    $q .= "  st_Genero as Genero,";
    $q .= "  tbl_UsuariosWeb.st_Direccion as Direccion,";
    $q .= "  tbl_UsuariosWeb.st_NumeroExterior as Numero_Exterior,";
    $q .= "  tbl_UsuariosWeb.st_NumeroInterior as Numero_Interior,";
    $q .= "  tbl_UsuariosWeb.st_Colonia as Colonia,";
    $q .= "  tbl_UsuariosWeb.st_Ciudad as Ciudad,";
    $q .= "  st_Municipio as Municipio,";
    $q .= "  st_Estado as Estado,";
    $q .= "  tbl_UsuariosWeb.st_PaisRegion as Pais,";
    $q .= "  st_TipoRegistro as Origen_Registro,";
    $q .= "  ltrim(DAY(tbl_UsuariosWeb.dt_FechaRegistro)) + '/' + ltrim(MONTH(tbl_UsuariosWeb.dt_FechaRegistro)) + '/' + ltrim(YEAR(tbl_UsuariosWeb.dt_FechaRegistro)) as Fecha_Registro,";
    $q .= "  tbl_UsuariosWeb.dt_UltimaActualizacion as FechaUltimaActualizacion,";
    $q .= "  st_DifusionPrograma as Difusion_Programa";
    //$q .= "  st_NombreMedico + ' ' + st_PaternoMedico + ' ' + st_MaternoMedico as NombreMedico";
    $q .= "  from (" . html_entity_decode(urldecode($row->tx_Query)) . ") as t1 ";
    $q .= " inner join tbl_UsuariosWeb on tbl_UsuariosWeb.id_UsuarioWeb = t1.id_UsuarioWeb";
    $q .= " left join cat_ViveCon on cat_ViveCon.id_vivecon = tbl_UsuariosWeb.id_vivecon";
    $q .= " left join cat_Genero on cat_Genero.id_Genero = tbl_UsuariosWeb.id_Genero";
    $q .= " left join cat_TiposRegistro on cat_TiposRegistro.id_TipoRegistro = tbl_UsuariosWeb.id_OrigenRegistro";
    $q .= " left join cat_Estados on cat_Estados.id_Estado = tbl_UsuariosWeb.id_Estado";
    $q .= " left join cat_Municipios on cat_Municipios.id_Municipio = tbl_UsuariosWeb.id_Municipio";
    $q .= " left join cat_DifusionPrograma on cat_DifusionPrograma.id_DifusionPrograma = tbl_UsuariosWeb.id_DifusionPrograma";
    //$q .= " right join view_segmTelCasa on view_segmTelCasa.id_UsuarioWeb = tbl_UsuariosWeb.id_UsuarioWeb";
    //$q .= " right join view_segmTelOficina on view_segmTelOficina.id_UsuarioWeb = tbl_UsuariosWeb.id_UsuarioWeb";
    //$q .= " right join view_segmCelular on view_segmCelulares.id_UsuarioWeb = tbl_UsuariosWeb.id_UsuarioWeb";


    //Comenzamos a enviar

    $file = str_replace(" ","_",$Segmento) . ".xls";
    $out = fopen("xls/" . $file, "w");
    $result = mssql_query ($q);
    while($fld = mssql_fetch_field($result)){
      fwrite($out, $fld->name . chr(9));
    }
    fwrite($out, chr(13) . chr(10));
    while ($row = mssql_fetch_row($result)){
      foreach ($row as $val) {
        fwrite($out, $val . chr(9));
      }
      fwrite($out, chr(13) . chr(10));
    }
    fclose($out);
  };
  $url = substr($_SERVER['PHP_SELF'], 0, strrpos ($_SERVER['PHP_SELF'], "/")) . "/xls/" . $file;



/*
    $result = mssql_query ($q);
    print "<table border=\"1\"><tr>";
    while($fld = mssql_fetch_field($result)){
      print "<td>" . $fld->name . "</td>";
    }
    print "</tr>";
    while ($row = mssql_fetch_row($result)){
      print "<tr>";
      foreach ($row as $val) {
        print "<td>" . $val . "</td>";
      }
      print "</tr>";
    }
    print "</table>";
  };
*/
?>
